home *** CD-ROM | disk | FTP | other *** search
/ Aminet 24 / Aminet 24 (1998)(GTI - Schatztruhe)[!][Apr 1998].iso / Aminet / util / misc / aview.lha / AView / Install / AView.install next >
Text File  |  1998-02-18  |  23KB  |  607 lines
  1. ; $VER: AView.install 1.45 (10.02.98)
  2. ; Install script for AView (Workbench 2.0 or higher)
  3. ;
  4. (COMPLETE 0)
  5. ;(USER 2)
  6. (SET #ApplicationName "AView")
  7. (SET #ApplicationDir "sys:tools")
  8. (SET #ApplicationDir1 "sys:utilities")
  9. (SET #ApplicationDir2 "work:tools")
  10. (SET #ApplicationDir3 "tools:")
  11. (SET #ApplicationDir4 "work:utilities")
  12. (SET #ArchiveDir "/")
  13. (SET #Language -1)
  14. (SET #Documents -1)
  15. (SET #ApplicationKeyfile (CAT #ApplicationName ".key"))
  16.  
  17. ;=============================================================================
  18. ; German strings
  19.  
  20. (IF (= @language "deutsch")
  21. (
  22. (SET default_lang 2)
  23.  
  24. (SET #bad-kick "Sie benötigen Workbench 2.0 oder größer")
  25. (SET #bad-installer
  26. (CAT "Achtung! Es ist eine alte Version des Programmes 'Installer' "
  27.      "auf Ihrem Amiga!\n\nDie Installation benötigt mindestens Installer 42.9.\n\n"
  28.      "Bitte überprüfen Sie Ihre Konfiguration!\n"
  29. ))
  30.  
  31. (SET #App-InstallMsg
  32. (CAT "\n%s Installationsskript.\n\n"
  33.         "Dieses Skript installiert oder deinstalliert\n"
  34.         "%s auf Ihrem Amiga.\n\n"
  35.         "Lesen Sie die Anleitungsdatei für weitere Informationen\n"
  36.         " über den Vertrieb von %s.\n\n"
  37.         "%s © 1995-98 Guido Mersmann\n"
  38.         "Alle Rechte reserviert."
  39. ))
  40. (SET #App-MainMode "Wählen Sie den gewüschten Vorgang!")
  41.  
  42. (SET #App-Where
  43. (CAT "Wo möchten Sie %s installieren ?\n"
  44.         "(Ein Verzeichnis wird angelegt)"
  45. ))
  46.  
  47. (SET #App-Update
  48. (CAT "\nEin %s-Verzeichnis existiert im ausgewählen"
  49.         " Verzeichnis.\n\n Wenn Sie fortfahren,"
  50.         " bestätigen Sie, daß Sie die alte %s-Installation"
  51.         " mit der neuesten Version überschreiben wollen.\n\n"
  52.         "Verschiedene %s-Dateien (z.B überflüssige Dateien) werden falls nötig überschrieben!"
  53. ))
  54.  
  55. (SET #App-Main "Welche Version von %s möchten Sie installieren?")
  56. (SET #App-Main-help
  57. (CAT "Die OS2.0+ Version läuft unter allen Systemen ab OS2.0."
  58.      " Die OS2.1+ Version hat den Nutzen, daß sie weniger Resourcen"
  59.      " benutzt, wenn sich %s im Hintergrund befindet. Dazu MUß"
  60.      " die Locale.library eingebunden sein. Für die OS3.0+ gilt das selbe"
  61.      " wie für die OS2.1 Verison. Es werden OS3.0+ Routinen benutzt, die"
  62.      " weiteren Speicher sparen."
  63. ))
  64.  
  65. (SET #App-Language "Welche Sprachen sollen installiert werden ?")
  66.  
  67. (SET #App-Language-help
  68. (CAT "\nDer Amiga kann in vielen verschiedenen Sprachen"
  69.          " arbeiten. Um Plattenkapazität zu sparen können Sie"
  70.          " nur die Sprachen anwählen, die sie benötigen"
  71.          " Haken Sie also einfach die Sprachen ab, die Sie"
  72.          " Ihrem System zugänglich machen wollen."
  73.           @askoptions-help
  74. ))
  75.  
  76. (SET #App-Docs "Welche Anleitungs- und Informationsdateien wollen Sie installieren ?")
  77.  
  78. (SET #Startup-DefIcons (CAT "\nWollen Sie AVDeficons in die user-startup "
  79.                             "eintragen?\n\nAVDeficons ist ein kleines Tool, "
  80.                             "das es Ihnen erlaubt Piktogramme für Dateien "
  81.                             "zu definieren, die kein eigenes Piktogramm haben. "
  82.                             "Sie können jedem Dateityp, den AView kennt, "
  83.                             "ein eigenes Piktogramm zuweisen und vieles mehr!"))
  84.  
  85. (SET #Startup-DefIconsDir (CAT "\nWollen Sie die mitgelieferten Piktogramme installieren?\n\n"
  86.                             "Wenn das wollen, dann sollten Sie wissen, daß "
  87.                             "Ihre selbst erstellen Piktogramme möglicherweise überschrieben werden."))
  88.                             
  89.  
  90. (SET #startup-prompt    "\n\nJetzt werden für %s folgende Eintragungen in die S:User-Startup gemacht:\n\n%s")
  91.  
  92. (SET #App-Exit "\n\n%s installiert!!\n\nSie finden %s im Verzeichnis \"%s\"")
  93. ;------- DEINSTALL STRINGS
  94. (SET #App-DeinstallWhere "Wo liegt %s auf Ihrer Platte ?\n")
  95. (SET #App-Install "%s Installieren")
  96. (SET #App-DeInstall "%s Deinstallieren")
  97. (SET #bad-DeInstall "Es gibt keine %s Installation an der angegeben Position")
  98. (SET #StartupRemove-prompt "\n\nDie zu %s gehörenden Einträge in der User-startup werden gelöscht!")))
  99. (SET #Deinstall-Done "\n%s ist jetzt deinstalliert!")
  100. ;=============================================================================
  101. ; English strings
  102.  
  103. (IF (<> @language "deutsch")
  104. (
  105. (SET default_lang 4)
  106.  
  107. (SET #bad-kick "You must have at least Workbench 2.0+")
  108. (SET #bad-installer
  109. (CAT "You have an old version of the program 'Installer' "
  110.      "on your Amiga!\n\nThe installation procedure needs at least Installer 42.9.\n\n"
  111.      "Please check your configuration!\n"
  112. ))
  113.  
  114. (SET #App-InstallMsg
  115. (CAT "\n\n%s Installation Script.\n\n"
  116.         "This script installs %s on your Amiga.\n\n"
  117.         "Read the guide file for more information\n"
  118.         " on the distribution of %s.\n\n"
  119.         "%s © 1995-98 Guido Mersmann\n"
  120.         "All rights reserved."
  121. ))
  122. (SET #App-MainMode "Please choose mode:")
  123.  
  124. (SET #App-Where
  125. (CAT "Where would you like to install %s ?\n"
  126.         "(A drawer will be created)"
  127. ))
  128.  
  129. (SET #App-Update
  130. (CAT "\n\nA %s drawer does already exist in the selected "
  131.         " directory.\n\n By selecting \"Proceed\", you"
  132.         " indicate that you want to update the %s"
  133.         " installation with the most recent version.\n\n"
  134.         "Several %s specific files will be overwritten!"
  135. ))
  136.  
  137. (SET #App-Main "Which %s version should be installed ?")
  138. (SET #App-Main-help
  139. (CAT "The OS2.0+ version should only be used on Systems with OS2."
  140.      " The OS2.1+ and the OS3.0+ version need less Memory. Locale is required!"
  141.      " Special OS3.0+ functions are used to save more memory."
  142. ))
  143.  
  144. (SET #App-Language "Which languages should be installed ?")
  145. (SET #App-Language-help
  146. (CAT "\nThe Amiga can be operated in many different"
  147.           " languages."
  148.           "To reduce the amount of space consumed by the"
  149.           " language files, you can select to have only the"
  150.           " files of specific languages copied.\n\n"
  151.           "Simply check the boxes of the languages you wish"
  152.           " to have available on your system.\n\n"
  153.           @askoptions-help
  154. ))
  155.  
  156. (SET #App-Docs "Which Amiga-guide files should be installed ?")
  157.  
  158. (SET #Startup-DefIcons (CAT "\nDo you want to install AVDeficons?\n\n"
  159.                         "AVDeficons is a little programm that allows to "
  160.                         "specify icons for each AView file type."))
  161.  
  162. (SET #Startup-DefIconsDir (CAT "\nDo you want to install the included icons?\n\n"
  163.                         "If you proceed this installer script is overwriting "
  164.                         "previous installed or created aview icons.\n\nIf this is "
  165.                         "your first AView installation you should install these "
  166.                         "icons."))
  167.  
  168. (SET #startup-prompt    "\n\nSome lines need to be added to S:User-Startup for %s\n\n%s")
  169.  
  170. (SET #App-Exit "\n\n%s installed !!\n\n%s can be found in your \"%s\" drawer (or partiton).")
  171. ;--------- DEINSTALLATION STRINGS
  172. (SET #App-DeInstallWhere "Where is the location of %s ?\n")
  173. (SET #App-Install "Install")
  174. (SET #App-DeInstall "Deinstall")
  175. (SET #bad-DeInstall "There is no %s installation at the specified position!")
  176. (SET #StartupRemove-prompt "\nRemove %s lines within your user-startup?")
  177. (SET #Deinstall-Done "\n%s is now deinstalled.")
  178. ;---------
  179. ))
  180. ;----------------------------------------------------------------------------
  181. ;----------------------------------------------------------------------------
  182. ;       P_Requirements
  183. ;----------------------------------------------------------------------------
  184. ;----------------------------------------------------------------------------
  185. (PROCEDURE P_Requirements
  186. ; Workbench 37 or better required
  187. (IF (< (/ (getversion) 65536) 37)
  188. (
  189.   (abort #bad-kick)
  190. )
  191. )
  192. ; Installer 42.9 or better required
  193. (if (< @installer-version 2752521)
  194. (
  195. (abort #bad-installer)
  196. )
  197. ) ;if
  198. ) ;PROCDURE
  199. ;----------------------------------------------------------------------------
  200. ;----------------------------------------------------------------------------
  201. ;       P_DeInstall
  202. ;----------------------------------------------------------------------------
  203. ;----------------------------------------------------------------------------
  204. (PROCEDURE P_DeInstall #InstallerMode
  205.  
  206. (SET #Dummy             (ASKCHOICE
  207.                         (PROMPT #App-MainMode)
  208.